home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-13 / me_cd22.zip / MUTT2.ZIP / MSDOS.MUT < prev    next >
Lisp/Scheme  |  1992-05-08  |  662b  |  24 lines
  1. ;; MS-DOS stuff for ME2
  2. ;; Bob Stocker    Public Domain
  3.  
  4. (include me2.h)
  5.  
  6. (defun MAIN
  7. {
  8.     ;; My prefered bindings:
  9.  
  10.   (bind-to-key "mark-and-home"        "S-F-A")    ;; gray home
  11.   (bind-to-key "mark-and-end"        "S-F-B")    ;; gray end
  12.  
  13.   (bind-to-key "previous-line"        "S-F-C")    ;; gray up arrow
  14.   (bind-to-key "next-line"        "S-F-D")    ;; gray down arrow
  15.   (bind-to-key "next-character"        "S-F-E")    ;; gray left arrow
  16.   (bind-to-key "previous-character"    "S-F-F")    ;; gray right arrow
  17.  
  18.   (bind-to-key "delete-character"    "S-F-H")    ;; gray delete
  19.   
  20.   (bind-to-key "previous-page"        "S-F-I")    ;; gray page up
  21.   (bind-to-key "next-page"        "S-F-J")    ;; gray page down
  22.   
  23. })
  24.